home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 04-03.C < prev    next >
Text File  |  1991-05-05  |  712b  |  43 lines
  1. main()
  2. {
  3.    int new_mode, old_mode;
  4.    double xmin, xmax, ymin, ymax;
  5.  
  6.    old_mode = fg_getmode();
  7.    new_mode = fg_automode();
  8.  
  9.    if (new_mode == 0) {
  10.       printf("This program requires graphics.\n");
  11.       exit();
  12.       }
  13.  
  14.    fg_setmode(new_mode);
  15.    fg_initw();
  16.  
  17.    fg_setworld(0.0,40.0,0.0,30.0);
  18.    redraw();
  19.    fg_waitkey();
  20.  
  21.    fg_getworld(&xmin,&xmax,&ymin,&ymax);
  22.    fg_setworld(0.0,xmax*0.5,0.0,ymax*0.5);
  23.    redraw();
  24.    fg_waitkey();
  25.  
  26.    fg_setmode(old_mode);
  27.    fg_reset();
  28. }
  29.  
  30. redraw()
  31. {
  32.    fg_erase();
  33.    fg_setcolor(1);
  34.  
  35.    fg_movew(0.0,0.0);
  36.    fg_draww(0.0,10.0);
  37.    fg_draww(10.0,10.0);
  38.    fg_draww(10.0,0.0);
  39.    fg_draww(0.0,0.0);
  40.  
  41.    return(0);
  42. }
  43.